* piezo1.asm* nested loop to make beepporta   equ     $1000        org     $8000start   lds     #$ff        ldx     #portaloop    bset    0,x %00001000   ; piezo is bit 3 of Port A        bsr     delay        bclr    0,x %00001000        bsr     delay        bra     loopdelay   clradelaylp deca        bne     delaylp        rts                org     $bffe        fdb     start